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1.0 ABSTRACT. 

THIS PROGRAM IS DESIGNED AS A MAINTENANCE AID FOR 

FIELD SERVICE PERSONEL. IT WILL VERIFY THE PROPER OPERATION 

OF A COMPLETE COMMUNICATION LINK FROM ONE PDP-11 

SYSTEM TO ANOTHER OR TO A COMMUNICATION TEST CENTER. 

THIS PROGRAM MUST BE USED IN CONJUNCTION WITH THE INTERPROCESSOR 
TEST PROGRAM (DZ I TP) ON A PDP-11 SYSTEM WITH A DL-11 INTERFACE. 

2.0 REQUIREMENTS. 

2.1 EQUIPMENT 

A. PDP-11 SYSTEM WITH 4K OF CORE. 

B. A CZDLODO DL11 COMMUNICATION INTERFACE. 

2.2 STORAGE. 

MK OF CORE 

3.0 LOADING PROCEDURE 

THIS PROGRAM IS IN ABSOLUTE FORMAT. 

THC ABS LOADER MUST BE USED TO LOAD THE PROGRAM . 

4.0 OPERATING PROCEDURES. 

A. TWO METHODS OF ENTERING PARAMETERS ARE PROVIDED 

1. LOAD AOORESS 200 AMD START TO ENTER PARAMS FROM CONSOLE TTY, PROCEED TO SECTION B. 
2- LOAD ADDRESS 200 AND SET SWITCH REGISTER BIT 15 BEFORE 



STARTING TO ENTER PARAMS FROM CONSOLE SWITCHES, PROCEED TO SECTION C. 
•THE PROGRAM MAY BE RESTARTED AT LOC 204 ( ONCE PARAMETERS HAVE ALREAOY BEEN SELECTED) 

B. CONSOLE DIALOGUE PARAMETER INPUT (CURRENT VALUES FOR PARAMETERS ARE FOUND IN OVERLAY) 

1. THE PROGRAM WILL TYPE OUT THE NAME OF THE VARIABLE OVERLAY. 

A. IF YOU WISH TO SETUP JUST THE INDICATED OVERLAY, TYPE A CARAGE RETURN 

B. IF YOU WISH TO SETUP A ONI I. TYPE IN ON. 

C. IF YOU WISH TO SETUP A DH11B8, TYPE IN DMB. 

IF DN OR OMB WAS TYPED IN STEP 1 ABOVE THEN THE BUS AOORESS. 

VECTOR ETC. REFERED TO IN STEPS 2 THRU 7, PERTAIN TO THE DNll OR DMBB. 

2. THE PROGRAM WILL TYPE THE DEFAULT BUS AOORESS OF THE INTERFACE UNDER TEST. 

A. TYPfc A CAR. RETURN TO USE DEFAULT BUS AOORESS 

B. TYPEIN ACTUAL BUS AOORESS 

3. THE PROGRAM HILL TYPE OUT THE DEFAULT VECTOR ADDRESS 

A. TYPE A CAR. RETURN TO USE DEFAULT ADDRESS 

B. TYPEIN ACTUAL VECTOR AOORESS 

4. THE PROGRAM WILL TYPE OUT THE DEFAULT INTERFACE PRIORITY 
NOTE: 200=PRI0 4, 240=PRI0 5. 300*PRI0 b, ETC. 
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A. TYPE A CAR. RETURN TO USE DEFAULT VALUE 
8. TYPE IN ACTUAL VALUE 

UE OF PARAMil 

OVERLAY LISTING FOR PARAMETER DESCRIPTION) 



THE PROGRAM WILL. TY P|OUT T ^ E s g^^ P,U ^o O^N^O 
l F . ^YTC^CAR. R? TURN'TO^USE DEFAULt VALUE 



P. 

B. TYPE IN ACTUAL VALUE 



£>. THE PROGRAM MILL TYPEOUT THE DEFAULT VALUE OF PARAM#2 

IF "1°° TY^A SS.'gtURH TO USE DEFAULT VALUE 
B. ENTER ACTUAL VALUE 

7. THE PROGRAM HILL TYPEOUT THE DEFAULT VALUE OF PAR AM #3 
Vr REQUIRED BY THE OVERLAY . 

A. TYPE A CAR. RETURN TO USE DEFAULT VALUE 

THE DN-11 MILL USE PARAM 13 AS THE • TO DIAL. 

IF USING A MODEM MITHOUT AUTOMATIC HANDSHAKING, 

THE NUMBER MUST TERMINATE MITH A 

"END-0F-NUM8ER" CHARACTER (:). 
8. ENTER ACTUAL VALUE. 

8. THE PROGRAM MILL RETURN TO STEP Bl IF THIS SETUP 
WAS FOR DN 11 OR DM1 IBS. 

AND TYPE A CAR. RETURN. 

NOTE: IF ANY OF THE ABOVE ITEMS 2 THRU 7 MERE CHANGED BY ENTERING 
NEW VALUES, THE NEM VALUE BECOMES THE DEFAULT VALUE FOR SUBSEQUENT 
RESTARTS OF THE PROGRAM. 
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SEQ 0004 
SEO 0004 



MANUAL PARAMETER INPUT FROM SWITCH REGISTER 

I. THE PROGRAM HALTS FOR ISR( INTERFACE SERVICE ROUTINE) SPECIFICATION 
SUR1H*S£TUP DM-UB j|R 



SWR13s< _ . ^ _. 
SWR=0O0OOO»SETUP VARIABLE ISR 



2. THE FOLLOWING HALTS ARE REPEATED FOR EACH ISR SPECIFIED. 

SETUP^Qj^^jQs^'pmL OVERLAY. (EACH ENTRY SET SUICHES THEN HIT CONTINUE.) 

b'. HALT FOR VECTORAOORESS OF INTERFACE 

C. HALT FOR PRIORITY OF INTERFACE 

D. HALT FOR INTERFACE PARAM il (SEE SECT. 10.0 IN OVERLAY LISTING FOR PARAMETER DESCRIPTION) 

E. HALT FOR INTERFACE PARAM 12 CDN11 AND DMBB PARAMETERS ARE DISCUSSED IN SECT. 10.0 OF THE MONITOR . 

F. GO BACK TO STEP A IF THIS SETUP UAS FOR ON OR DMB. 

3. HALT FOR OPERATIONAL SWITCH SETTINGS. (SEE STEP D. ) 
A. PRESS CONTINUE TO START TESTING 

BEFORE ATTEMPTING TO RUN THIS PROGRAM. THE OPERATOR MUST 
ACCERTAIN THE COMPLETE COMMUNICATION LOOP AND PROCEEDURES 
TO BE USEO. INCLUDING THE TYPE OF MODEMS. THE TYPE OF 
INTERFACE BEING USED AT THE OTHER CPU A?© THE MODES OF OPERAT 
DATA AND PARAMETERS TO BE USED AT EACH CPU. 

THIS WILL REQUIRED VOCAL COMMUNICATION WITH THE OPERATOR 
AT THE 5THER CPU UNLESS ITS CONFIGURATION AND OPERATION 
ARE FIXED AS A TEST CENTER . 



ION, 



AFTER DETERMINING THAT THE EQUIPMENTS ARE COMPATIBLE AND 

3LE PARAMETE 

— . -- TO RECEIVE DATA FIRST ... 

LOADED ANO STARTED. IF THE MODEM BEING USED ON THIS SYSTEM 



AGREEING ON THE MOOE AND VARIABLE PARAMETERS TO BE USED, 
■"■*— - s ~ — DATA FIRST SHOULD^" 



THE SYSTEM WHICH IS TO RECEIVE DATA FIRST SHOULD BE 
LOADED ANO STARTED. IF THE MODEM BEING USED ON THIL 
HAS AN AUTOMATIC ANSWER FEATURE, IT SHOULD BE ENABLED 

THE SYSTEM WHICH IS TO TRANSMIT FIRST SHOULD THEN BE LOADED 
AND STARTED AND THE CONNECTION ESTABLISHED EITHER MANUALLY 
OR AUTOMATICALLY (VIA DN-U). 
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SEQ OOOS 
SEO 0005 



OPERATIONAL SWITCH SETTINGS 
SU15-1 HALT ON ERROR 
SW14-1 SINGLE 

5U1S HAS N 
SW13-1 INHIBIT 
SW12«| INMIBIt 

ire ' 



CT IF SHOM»0 



TYPEQUTf 
ITS i 



TYPEOU 



Q0«1 

m 



usly sfje^iS^DA? 



XCEPT ERRORS 
" TYPED 
TYPED. 

A 



Hi 
SW08«1 

SW07-1 DO N01 



MONITOR 

XJTOT 



MONITOR 
* IN MANY 
TTY. THIS . 

RUNNING AT _ 

OR SLOWER BAUDS, 




•i Sng 2 g?« F0X) 

•3 (fC CONTEST/QUICK BROUN FOX/NUMERICS) 
nATA (INTERNAL LOOPBACK MODE) 
i DATA 

DATA ON CONSOLE TTY.* 
iTA ON CONSOLE TTY. » 
T ALL DATA HILL APPEAR ON THE CONSOLE 
ALLY TRUE WHEN THE COMM INTERFACE IS 

BAUD THAN THE CONSOLE. BUT EVEN AT EQUAL 
L CHARACTERS MAY NOT APPEAR ON THE CONSOLE. 



SW0M=1 RETURN TO MONITOR FOR END PASS 

WHEN SW04»0 PROGRAM LOOPS IN THE OVERLAY NEVER RETURNING TO THE MONITOR. 
SW03=1 INTERNAL LOOPBACK MODE 
SU02=1 EXTERNAL LOOPBACK MODE 
SW01=1 ONE-WAY- IN MODE 
SW00=1 ONE-WAY-OUT MODE 
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THIS PROGRAM HAS BEEN NOOIFIED TO RUN ON A PROCESSOR WITH OR WITHOUT 
A HARDWARE SWITCH REGISTER, WHEN FIRST EXECUTED THE PROGRAM TESTS 
THE EXISTENCE OF A HARDWARE SWITCH REGISTER. IF NOT FOUNO A 
SOFTWARE SWITCH REGISTER LOCATION (SMREG«LOC. 176 ) IS DEFAULTED TO. 
IF THIS IS THE CASE. UPON EXECUTION THE CONTENTS OF THE SWREG ARE 
DUMPED IN OCTAL ON THE CONSOLE TTY AND ANY CHANGES ARE REQUESTED 



(IE) SWR=XXXXXX NEW= 
POSSIBLE RESPONSES ARE: 



1. <CR> 

2. 6 DIGITS 0-7 

3. tU 



IF NO CHANGES ARE TO BE MADE 

TO REPRESENT IN OCTAL THE NEW iWITCH REGISTER 
VALUE : LAST DIGIT FOLLOWED BY <CR>. 
TO ALLOW REENTERING VALUE IF ERROR IS COMMITTED 
KEYING IN SWREG VALUE. 



BUILT INTO THE PROGRAM IS THE ABILITY TO DYNAMICALLY CHANGE THE 
CONTENTS OF SWREG DURING PROGRAM EXECUTION. BY STRIKING tG 

"VfOR SETS A REQUEST FLAG TO CHANGE 



(CNTL G) ON CONSOLE TTY THE OPERA* 



APPLICABLE AREAS. 



IE. OPERATOR SPECIFIED DATA WAS INDICATED. THE PROGRAM WILL TYPE A 

DATA. DATA MAY BE ENTERED AS ASCII CHARACTERS OR OCTAL CODE. 



REQUEST FOR THE _ _ ... 

JYP| INTHE DATA TERMINATED WITH A CR. OCTAL CODE MAY BE ENTERED BY typing AN 
t (UP ARROW) FOLLOWED BY THE OCTAL CODE (IN THE RANGE 000 TO 377) 
SEPERATED BY SPACES AND TERMINATED BY t (UP ARROW). 
I.E. ABCDt 000 123 377t EFG (CAR. RETURN) 

A TYPICAL SWITCH SETTING FOR HALF -DUPLEX=003 i 50 THIS SETTING USES 
I5J ER ^,k2 C *§ ACk ' MODE. LOOPS IN OVERLAY. MONITORS TRANSMITTED AND RECEIVED 
DATA ON THE CONSOLE TTY, AND TESTS RECEIVED DATA USING TEST MESSAGE 13. 

?s^^S c ^l^? R I f^|| x i» T i:SSpSK 1 !go E . 

WHCN A 001 CHARACTER IS RECEIVED, THE RECEIVER IS SHUT OFF. 

IF THE MESSAGE WAS IMPUTED BY THE OPERATER, THE TERMINATING CHARACTERS ARE ADDED 
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TEST MOOES 

INTERNAL LOOPBACK MODE 



3. TRANSMIT THE DATA SELECTED »Y SWOB ANO SW10 (SU8=0) OR 
TRANSMIT THE RECEIVED DATA <SW8=1) 

4. RETURNS TO MONITOR FOR "END PASS" <SW4=1) OR 
CO TO STEP 1- (SW4«0) 

EXTERNAL LOOPBACK MODE 

1. THE OVERLAY SETS REQUEST TO SEND 

2. MA IT FOR CLEAR TO SEND 



SW7=0) 



WAIT FOR CLE 

3. TRANSMITS 'HE SELECTED DATA 

4. RESETS REQUEST TO SEND 

5. WAIT FOR MESSAGE TO BE RECEIVED 
6>. VERIFIES TM: DATA <SW07«0) 



7. RETURNS TO MONITOR FOR "END PASS" . (SW04=1) OR 
GO TO STEP 1(SW04«0) 

ONE-WAY- IN MODE 

1. THE OVERLAY WAITS FOR MESSAGE TO BE RECEIVED. 

2. VERIFIES THE DATA(SW07=0) 

3. RETURNS TO MONITOR FOR "END PASS" (SW04=1 ) OR 
GO TO STEP 1 (SW04=0) 

ONE-WAY-OUT MODE 



1. THE OVERLAY SETS REQUEST TO SEND 

2. WAITS FOR CLEAR^TO SENj) 

H\ RETURNS fo^C^TO? FOR "END PASS". (SW04=1> OR 
GO TO STEP 1 (SW04»0) 



THE OVERLAY IS THEN ENTERED AND A CONNECTION ESTABLISHED EITHER 
MANUALLY OR AUTOMATICALLY. 

IF ONE -WAY- IN OR INTERNAL LOOPBACK MODES ARE SELECTED. 

THE OVERLAY HILL SET DATA TERMINAL READY AND WAIT FOR DATA. 

IF ONE-WAY-OUT OR EXTERNAL LOOPBACK MOOES WERE SELECTED. 
THE OVERLAY WILL SET DATA TERMINAL READY AND REQUEST TO SEND. 
THE OVERLAY HILL THEN WAIT FOR CLEAR TO SEND BEFORE ATTEMPTING TO 
TRANSMIT DATA. 

THE PROGRAM WILL PRINTOUT A "WAITING FOR CLEAR TO SEND" 
MESSAGE AND THE CONTENTS OF THE XMIT CSR EVERY 60 SECS. 
UNTIL CLEAR TO SENO IS ASSERTEO. 
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SEQ 0008 
SEO 0008 



F. IF SWOM=0 THE OVERLAP WILL CONTINUE TO 
TRANSMIT/RECEIVE DATA. 

IF 5W0M=1 THE OVERLAY WILL RETURN 
TO THE MONITOR ANO TYPE "END PASS" . 

IF BOTH SW0H=1 ANO SWH=1. THE PROGRAM WILL REQUEST 
NEW INTERFACE PARAMS AFTER ONE PASS OF THE SELECTED 
TEST MOOE. 

TEST EXECUTION MAY BE INTERRUPTED BY TYPING THE FOLLOWING 

CHARACTERS ON THE CONSOLE TTY. 

LINE FEED = RESTART PROGRAM AT LOCATION 200. 

QUESTION MARK = PRINTOUT FIRST 8 WORDS OF INPUT BUFFER. (ASCII ) 

THEN TYPE EITHER: 

•WXXXXXX TO PRINTOUT THE 8 WORDS 

AT LOC XXXXXX. 

•BXXXXXX TO PRINTOUT THE lb BYTES 

AFTER LOC XXXXXX. 

*C TO CONTINUE 

PROGRAM MUST BE RESTARTED AT 800 AFTER PRINTING. 
CARRIAGE RETURN = RESTART AT REQUEST FOR NEW OPERATIONAL SWITCHES. 

5.C PROGRAM AND/OR OPERATOR ACTION 

IF THE OPERATOR WISHES TO MANUAL Y EXAMINE THE TRANSMIT OR RECEIVE 
BUFFERS, DO THE FOLLOWING: TO FIND THE STARTING ADDRESS OF THE RECEIVE 
BUFFER, LOAD ADDRESS 11020 AND EXAMINE. TO FIND THE STARTING ADDRESS 
OF THE TRANSMIT BUFFER , LOAD ADDRESS 11022 AND EXAMINE. 

5.1 NORMAL HALTS 

SEE SECTION M. 

b.O ERRORS 

b.l ERROR REPORTING 

THE ONLY ERROR REPORT FROM THE CONTROL PROGRAM OCCURS IF THE 
INTERFACE SPECIFIED IS NOT LOADED. 

IF DATA IS RECEIVED AND SWITCH 7 (NO DATA COMPARE) 
IS RESET THE DATA WILL BE COMPARED AGAINST THE PRESELECTED 
2912^7.^ 9 ,k IN£ . F EED CHARACTER IS RECEIVED. IF THERE IS A 
MISMATCH, THE FOLLOWING ERROR REPORT IS PRINTED: 

RECEIVED DATAsRRRRRR 
DATA SHOULD BE TTTTTT 

DATA COMPARE ERROR; BAD OATA=BBB GOOD DATA=GGG 
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UHERE RRRRRR IS THE RECEIVE BUFFER <UP TO 512 CHARACTERS) 
TTTTTT IS THE TRANSMIT BUFFER (UF TO 512 CHARACTERS) 
BBB IS THE B«0 DATA CHARACTER 
GGG IS THE GOOD DATA CHARACTER 

IF THE INTERFACE DETECTS A DATA ERROR. THE FOLLOWING 
WILL BE PRINTED BEFORE THE DATA IS COMPARED: 

THERE WAS A RECEIVER ERROR. RECEIVER DATA REGISTER =XXXXXX 

WHERE XXXXXX IS THE CONTENTS OF THE RECEIVER DATA REGISTER 
THE LOW BYTE IS THE DATA, ANO THE HIGH BYTE IS THE ERROR BITS. 

IF A RECEIVE TERMINATING CHARAC TER < 00 i > IS NOT DETECTED 
WITHIN 512 CHARACTERS A "BUFFER FULL" PRINTOUT WILL OCCUR. 

7.0 RESTRICTIONS 



THE OPERATION OF THIS PROGRAM REQUIRES COORDINATION BETWEEN 
THE OPERATOR ANO THE OPERATOR OF ANOTHER PDP-11 SYSTEM 
UNLESS ONE OF THE SYSTEMS IS ALWAYS OPERATING IN A FIXED 
MODE. THE FOLLOWING TABLE LISTS THE VALID COMBINATIONS: 

CPU tl CPU 12 

ONE-WAY-OUT ONE-WAY-IN 

ONE -WAY- IN ONE-WAY-OUT 

EXTERNAL-LOOPBACK INTERNAL-LOOPBACK 

INTERNAL-LOOPBACK EXTERNAL-LOOPBACK 

EXTERNAL-LOOPBACK EXTERNAL-LOOPBACK (FUlL DUPLEX) 

WrttN THE COMMUNICATION LINK INVOLVES MODEMS THE FOLLOWING 
RESTRICTION APPLY: 

IF RUNNING IN FULL DUPLEX MODE BOTH SYSTEMS 
MUST BE IN EXTERNAL LOOP BACK MODE. 

BOTH SYSTEMS SHOULD BE RUNNING IDENTICAL ROUTINES. 
EXAMPLE: 

SWITCHES 14,13,7,4 SHOULD BE THE SAME 
ON BOTH CPU S 

IF PROGRAM IS WAITING IN A SCAN ROUTINE AND TYPES OUT 
A "WAITING MESSAGE" IF AN INCOMING MESSAGE STARTS DURING 
THE TYPE OUT, IT WILL BE LOST BECAUSE THE TYPE OUT PRIORITY 
IS AT LEVEL 7. THIS WILL RESULT IN OVERRUN OR SILO OVER- 
RUN ERRORS, DEPENDING ON THE DEVICE. TO AVOID THIS SITUATION 
RUN WITH SWITCH 13 UP. IF OVERRUN DOESOCCURE DURING A 
TYPEOUT THE PROGRAM SHOULD BE RESTARTED. 

IF USING AN ASYNCRONOUS DEVICE. MODEMS ANO THE 
MAYNARO TEST STATION AND INITALIZE DOES NOT CLEAR THE 
CONNECTION (EXAMPLE THE DJ11 ) IF THE PROGRAM IS RESTARTED 
IN THE MIDDLE OF A MESSAGE AT LOC 204 OR BY HITTING CR 
AN IMMEDEATE ERROR MESSAGE FROM MAYNARD WILL BE RE- 
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SEQ 0010 
SEO 0010 



8.0 



CEIVED. THIS IS BECAUSE THE TEST STATION IS STILL LOOKING 

FOR THE REST OF THE INTERUPTEO MESSAGE. TO AVOID THIS 
ERROR , RESTART PROGRAM ONLY A T THE END OF THE MESSAGE 
CURRENTLY BEING TRANSMITTED. 

MISCELLANEOUS 

ITEP WAS CHECKED OUT USING THE FOLLOWING BELL TELEPHONE MODEMS. 
£01 A (HALF -DUPLEX SYNCHRONOUS 2000 BAUD ) 
2C2C (HALF-DUPLEX ASYNCHRONOUS 1200 BAUD) 
103A (FULL -DUPLEX ASYNCHRONOUS 110 BAUD) 



9.0 
9. 1 



9 8 



9.3 



9.31 



9.32 



9.33 



9 34 



PROGRAM DESCRIPTION 

THE CZOLODO DL11 INTERFACE SERVICE P ARAMS ARE SETUP, AS SPECIFIED BY THE OPERATOR, 
BY THE ITEP CONTROL PROGRAM. 

TIME: PROVIDES A MEANS OF MEASURING ELASPED TIME. IT IS INCREMENTED 
EVERY SECONO BY A CLOCK INTERRUPT ROUTINE IN ITEP. 

WHEN THE OVERLAY IS FIRS 
THE CONTENTS OF THE SWlTV 
THE MODE AND DATA SELECT I 
BE ALTERED WITHOUT^TURNlNG TO 
THE INTERRUPT VECTORS A) ~ 
THE SELECTED ROUTINE D£ 



RMI 



AT LOCATION START:, 
OREO IN REGISTER 0. 
THl| TIME AND CANNOT 
ITROL PROGRAM. 

WJSh ENTERED 



THE OVERLAY THEN LOOPS IN ROUTINES: fOMI ,IF "ONE WAY IN" MODE 
WAS SELECTED. tOWO.IF "ONE WAY JjUT" WOOE HAS SELECTED . 
SILB, IF "INTERNAL LOOP BACK" MODE WAS SELECTED. 
SXLB.IF "EXTERNAL LOOP BACK*' WAS SELECTED. 



IOWI: IN THIS ROU" 
LOOPS WAITING FOR 
FOR bO SECS A "WA: 
DONE, THE PHQ&lPm i 
PASS DEPENDING ON 



E RECEIVER IS 
CEIVER T 

MESSAGE 

DATA IF _ 

sett:ngs 




INITIALIZED AND PROGRAM 
IF NOTHING 



D. WHEN THE , 
S PERMIT, ANO 




RECEIVED 
IVER IS 
S END 



s INITIALIZED ANO PROGRAM LOOPS 

TO FINISH. A "WAITING" MESSAGE IS TYPED 
IS NO ACTION. WHEN THE TRANSMITTER. IS. 
R LOOPS BACK TO SO WO OR 



TYPES END PASS 



tOWO: THE TRANSMIT 
WAITING FOR TRANSMJTTi 
EVERY bO SECS IF THti- 
DONE. THE PROGRAM L I " '* n lwt 
DEPENDING ON SWITCH SETTINGS. 

SILB: THE RECEIVER IS INITIALIZED AND PROGRAM LOOPS WAITING FOR 
RECEIVER TO FINISH, A WAITING" MESSAGE IS TYPED EVERY 60 SEC 
IF NO ACTION. WHEN RECEIVER IS DON! PROGRAM CHECKS WTA IF SWITCH 
SETTINGS PERMIT. ANO END PASS IS TYPED IF SWITCH SETTINGS PERMIT 
THEN THE TRANSMITTER IS INITIALIZED. A "WAITING MESSAGE IS TYPED 
EVERY bO SEC IF NO ACTION. WHEN TRANSMITTER IS DONE PROGF 
TO START OF ROUTINE. (SILB) 



TOGRAM RETURNS 



SXLB: IF IN HALF DUPLEX THE TRANSMITTER IS INITIALIZED. 

A "WAITING MESSAGE IS TYPED EVERY SO SEC IF THERE IS NO ACTION 
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WHEN THE TRANSMITTER IS DONE THE RECEIVER IS INITIALIZED 



9 B 




R AND TRANSMITTER ARE INITIALIZED 
0 EVERY 60 SEC IF THERE IS NO 
HUixon wwtf <nt w.utirtR AND TRANSMITTER ARE DONE. DATA 

CHECKED. END PASS IS TYPED AND PROGRAM LOOPS TO SXLB DEPENDING 
ON THE SWITCH SETTINGS. 

* ■ " Z&F ST MtS 0 *^^ *S fftOPlS EftlWT ENABLE 
BIT ANO ALL GENERAL REGISTERS. IT THEN RETURNS TO THE MONITOR 

AS SAVEOIN E0P."« DlLBY FLAG IS SET AMD PHOORBM RETURNS TO 
THE SCAN ROUTI(C<0H0,0m,lLB,XLB) WHERE IT CAME FROM. 

AFTER A SETTING^TA TEF^NAL READY" AND "REQUEST TO SEND" A CHECK 
IS NAOE ON PARANg TO DETERMINE IF HALF DUPLEX OPERATION 
WAS SELECTED BY THE OPERATOR. IF IT WAS, THE 
SUBROUTINE WAITS FOR CLEAR TO SEND. 
A 'WAITING FOR CLEAR TO SEND' PRINTOUT OCCURS 
EVERY 30 SECONDS UNTIL CLEAR TO SEND IS ASSERTED. 

" 7 ^ww^msFMwm 



NECESSARY TO 

RECEIVE A MESSAGE. 

THE TRANSMIT INTERRUPT SERVICE ROUTINE. 
AT XISR:, IS ENTERED VIA TRANSMIT INTEARUPTS 
FROM THE INTERFACE . 
A TEST IS MADE TO SEE IF THE LAST CHARACTER 
TRANSMITTED MAS A NULL (ALL ZEROS) CHARACTER. 
IF IT WAS: THE TRANSMIT LOGIC IN THE INTERFACE 
IS RESET AND THE TRANSMIT COMPLETE FLAG IS SET. 
AT XISR1: THE NEXT CHARACTER IS TRANSMITTED 
AND PRINTED ON THE TTY IF THE MONITOR TRANSMIT 
SWITCH IS SET. 

9.9 THE RECEIVE INTERRUPT SERVICE ROUTINE 

.AT RISR:. IS ENTEREO VIA RECEIVER INTERRUPTS 

FROM THE tNTERFACE . 

THE RECEIVED CHARACTER IS STORED IN 

THE INPUT BUFFER AND PRINTED ON THE TTY IF 

THE MONITOR RECEIVER SWITCH IS SET. 

IF THE INPUT BUFFER IS FULL. A 'BUFFER FULL' 

PRINTOUT WILL OCCUR. THIS INDICATES THAT A 

LINE FEED CHARACTER WAS NOT RECOGNIZED 
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<9. 10 



IN THE RECEIVED DATA (WITHIN 1000 CHARACTERS) . 
IF THE RECEIVED CHARACTER IS A LINE FEED, 

AND THE 

T. 

AT RISR: , THE 



}sr Arc mrwiElbe saveB^aS t I8int E 0 

AFTER THE COMPLETE MESSAGE HAS BEEN RECEIVED 

BEEN 

if a 'receive error' had been detected, 
the contents of the 'receive buffer ' at the 
time the err^r occurred mill be printed, 
the data is cohpareo until a ^ll zeros ' 
character is recognized. 'fill' (all ones) j 
characters are ignored. if a mismatch 
is detected, the complete contents of the 
input buffer and good data is printeo. 

10.0 parameters for the dl11 

param»1 must be all zeros. 

paramb2 bit 0 of this parameter is checked by the software to run 

either full-duplex or half-duplex. bit0=1 selects full-duplex, 

bito=0 selects half-duplex. default is half-duplex, all other bits must be zeros. 

param»3 is used by software to determine if test is to be run a modem ; ; **d 

other than a standard American modem, for example, euorpean modems 
employ a clamp to inhibit carrier detect (bit12) when request to 
send is asserted. if this diagnostic will be run on a european 
modem, manually set param3 to zero(o). otherwise leave value at 
minus one( 177777). 
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B81 
588 

113 

585 
566 
587 
588 
589 
590 
591 
596 
593 
594 
595 
5% 
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5EQ 0013 
SEO 0013 



2 g7 
598 

599 

bOO 

501 

502 

503 

504 

505 

506 

507 

508 

609 

610 

611 

612 

613 

614 

615 

616 

617 

618 

619 

620 

6c 1 

622 

623 

624 

625 

626 

627 

628 

629 

630 

631 

632 

633 

634 



011000 
011004 
011006 
011010 
011012 
011014 
01101 

Sii 

on 

011026 

81183 
8H8S 

011040 
OH 040 
011041 
011041 
011042 
011044 
011046 



011000 

046104 000040 

1SU8 

000200 
000000 
000000 
177777 




011050 
011052 
011054 
011056 
011060 

011062 
011064 
011066 
011070 

011072 
011074 
011076 
011100 



000000 
011102 

000 

001 
000000 
177570 
177570 



000000 
100000 
040000 
020000 
020000 

000000 
000000 
000000 

oooooo 

000000 

oooooo 
oooooo 
oooooo 
oooooo 

177560 
177562 
177564 
177566 

000001 



ft************************************************************** 

DL11 INTERFACE SERVICE PARAMS 
***#**•*»*#***#**»*«************#***»*•**••••••*•• ****** *•*••*# 

.=11000 

/DL / :ISR NAME 



DL11: 
BR: 
RIV: 
PRIOR: 
PAR AMI : 
PARAM2: 
PARAM3: 
IROA: 
IXDA: 
SETTLE: 

82016: 
TIME: 



TX. TERM; 
RX. TERM: 



. ASCIZ 
175610 
300 
200 

OOOOOO 

OOOOOO 

177777 

.WORD 

.WORD 

.UORO 

.UORD 

.WORD 

.WORD 

.WORD 

.WORD 



0 
0 
0 
0 
0 
0 
0 

START 



.BYTE 000 



.BYTE 001 
FLAG: .WQRO 0 
SWRi 177S70 
0ISPLAY:177S70 



BUS ADDRESS 
VECTOR ADDRESS 
PRIORITY 
PAR AM §1 
PAR AM «2 
PARAM S3 

INITIAL READ DATA ADDRESS 
INITIAL XMIT DATA ADDRESS 
LINE SETTLE DELAY FLAG 

ADDR OF BIN TO OCT TYPE ROUTINE 
TIMER 

ADDR OF START OF PROGRAM 
TRANSMITTER TERMINATING CHAR. 
RECEIVER TERMINATING CHAR. 



A**************************************************** **••**••*• 

CONSTANTS + WORKING STORAGE 
ft************************************************************** 

STATxRQ 

;XMIT COMPLETE FLAG 
;RCV COMPLETE FLAG 
;DATA SET STATUS CHANGE FLAG 
{INHIBIT PRINTOUTS 



XFLG=100000 
RFLG=40QQQ 
DSFLG»20000 
BIT 13=20000 



SXCSR 
SRCSR 
ERCSR 
EROBR 
DSSTAT 



XCC 
RCC 
RDA 
XDA 



TKS 
TKB 
TPS 
TPB 



0 
0 
0 
0 
0 

0 
0 
0 
0 

177S60 
177562 
177564 
177S66 



; SAVED XMIT CSR 

; SAVED RCV CSR 

•RCV CSR SAVED ON ERROR 

;RCV DATA REG SAVED ON ERROR 

;RCV CSR SAVED ON DS CHANGE 

XMIT CHAR COUNT 
RCV CHAR COUNT 
RCV DATA ADDR. 
XMIT DATA ADDR. 



FULL.DUPLEX=000001 



0111 
0111 


85 


0111 


10 


QUI 


14 


0111 




0111 




QUI 




0111 




011140 


Q111HH 


011150 
011154 


011160 



C20L000 DLU 
CZ0L00.P11 



635 

637 
638 
blS 

b40 
bSl 
642 
643 
644 
b45 
64b 
b47 
648 
b49 
650 
b51 
652 
653 
bS4 
b55 
656 
bS7 

bi? 

660 
661 

66§ 
66H 
665 

SS* 

668 
668 

670 
671 
672 
673 
674 
675 
676 
677 
678 
679 
680 
681 
682 
683 
684 
6B5 
686 
687 
688 
689 
690 



ITEP OVERLAY 
23-HAR-78 15: 



25 



HACY11 30ft ( 1052 J 23-NAR-78 



B02 

16:36 PAGE 



15 



5E0 0014 
SEO 0014 



Oil 164 
01 U70 
011174 

on 



011254 
011256 



04 

010264 



005037 




14C 
000137 
000000 
000776 



104416 
004737 



177734 
177400 

'11 




01 1032 
013054 
013060 
000001 

011362 
000002 

01 1254 
000010 

011460 
000004 

011710 



DL11-X INTERFACE SERVICE ROUTINE 



START: 



NOP 
NOV 
BIC 
NOV 
NOV 
NOV 
NOV 
NOV 
NOV 
NOV 
NOV 
BIC 
NOV 



aSWR. RO 
•177400, 

•ilSR, (^2)* 
PRIOR, (R2)+ 



: SETUP NODE IN RO 
RO ; STRIP JUNK 



8 8: 

Bfc 



CR2)* 
(R2) + 
R4 



PAR AMI , 9RCSR 
PARAN2.R2 
•0001, R2 

R2, XCSR(R4) 



?NTERf 



_ RRUPT 
VECTORS 



SETUP BUS AOOR INDEX 
SETUP VARIABLES 



IN CSR'S 



••««*««»***«»*«•#««*««•«*#«*****»**»•* 

ROUTINE USED TO GOTO 
SUBROUT I nTdEPENDENT 
ON NOOE SELECTED. 
*••«**«**«*««»***«#«*»«*•«*«•«*»*»•••• 



GO: 

IS: 
25: 
31: 
45: 



CLR 
CLR 
CLR 
BIT 
BEG 
JNP 
BIT 

B|S 
JNP 

BIT 

BEQ 

JNP 

IK 

JNP 

HALT 

BR 



TINE 

DELAY 

STOP 

•OWO.NOOE 

&0 

II , NODE 



•I LB, NODE 
35 

SILB 

•XLS, NODE 
4f 

SXLB 

.-2 



IIHHHHHHHHIHHHHIHHiHIIIHIIIHHHHIHMIIHHOHH 
ROUTINE USED IF "ONE UAY IN" NOOE HAS SELECTED. 
NOTE THAT UHEN IN THIS NOOE HALF DUPLEX IS THE 
ONLY NOOE AVAILABLE. 

"ONE MAY IN" HERNS THAT ONLY THE RECEIVER IS 
ENmIKED. THE TRANSNITTER IS NEVER "TURNED ON" . 
#####«»#«#•*###*##«•##»•«*«#»#»#»««»###»#»«*##•«*»****************•» 



013402 



SOUI: 



KBDIN 
J5R 



PC, STARTR 
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lb 



SEC* 



b9l 
bS2 

ffi 
b95 
b96 

697 
b98 
b99 
700 
701 
702 
703 
70S 
705 
7C6 
707 
708 
70S 
710 
711 
712 
713 
714 
715 
71b 
717 
718 
719 
720 
721 

724 
725 
726 

728 
729 
730 
731 
732 
733 
734 
735 
736 
737 
738 
739 
740 



011262 
Oil 



032700 




81 i 

Oil 
Oil 
Oil 
0113H4 
011346 
011354 
011360 



§3S 

001405 
012737 
000137 
000735 



011362 
011364 
01 1370 
011374 
011400 
011402 
011410 
011412 
011414 
011420 
011422 
011426 
011430 
011434 
011442 
011444 
011452 
011456 



10441b 
004737 

W& 

001013 
023727 
103771 

8118 

104001 
005037 

&m 

032777 
001405 
012737 
000137 
000741 



040000 
011032 

000004 
011032 

000200 
012300 



If: 



BIT 



000100 



011360 
012140 



177520 

177500 
013056 



2S: 
31: 

4S: 



•RFLG.STAT 
^ME.ilOO 

9RCSR.R2 
XCSR(R4),R3 

JlNE 
IS 

•NOOAT, 3SWR 
35 

PC.TESTD 
•RFLG.STAT 
•L0OP.3SWR 
41 

•4^, BACK 

low I 



***#####«*«*«««*««*««*****«*«************#«#*«#*»***»«*»«******••*•* 

IF _"0NE .WRY OyT" URS^LICTgD . 




IN THIS MODE HALF 



IX IS THE ONLY 



IS 



MEANS THAT ONLY THE TRANSMITTER 
ENABLED. THE RECEIVER IS NEVER "TURNED ON. 
***#****«*#*«*«*«*«*****«***»•«**»*•*•**»«•••*********«*»*»***«•••*• 



013062 

?U88 

011032 000100 



000004 
011032 
100000 

000020 177402 

011456 013056 
012140 



10140: 
IS: 



2S: 



3S: 



KBOIN 

JSR 

CLR 

BIT 

BNE 

CMP 

BLO 

MOV 

MOV 

HLT 

CLR 

If? 

BEQ 
MOV 
JMP 
BR 



TARTX 



•XFLC.STAT 
2S 

TIME. 8100 

WCSR.R2 
XCSR(R4),R3 

TIME 
IS 

•XFLG, STAT 
•LOOP 3SUR 
35 

•35 , BACK 

EOP 

SOWO 
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SEO 001b 
SEO 001b 




759 

7b3 
7bS 
7bS 

7b8 
7b9 

770 
771 
772 
773 
774 
775 
77b 
777 
778 
779 
780 
781 
782 
783 
784 
785 
78b 
787 
788 
789 
7S0 
791 
792 
793 
79M 
795 



Oil 
Oil 
Oil 
Oil 
Oil 

81} 

01 1554 

Oil " 

on 

Oil:. 
01157b 

8ilt8 

OllblO 
011514 
OUblb 
011b20 
011b2M 
OllbSb 
011b32 
011b34 
Ollb'40 
OllbSS 
OllbSO 
011552 
OllbbO 
311bb2 
OllbbH 
011b70 
011b72 
011b7b 
□11700 
0117CM 




010337 

Aoiffb 
112743 
005203 
112723 
105023 
C0S037 
004737 
032700 
001013 
023727 
103771 
011402 
015403 
104001 
005037 
0007b2 
042700 
000137 



ONLY NODE AVAILABLE. 
IS TRANSN 




BACK" MEANS THAT THE 
MESSAGE IS RECEIVED. 



THE CYCLE 



ilVEN. 



I 

.... v&w WHOLE 

IS REPETED AS ABOVE. 



IS "TURNED ON" 
S TO BE CHECKED 



MESSAGE 



013402 
011032 
040000 

011032 000100 



000004 
011032 
000200 

OCX 

011570 
1121 HO 



SILB: 
IS: 



177310 2S: 
3S: 

177270 
0130SS 
17724b 4S: 



8iiS 

011070 



000177 

000177 

011032 
0130b2 
100000 

011032 000100 

000004 

011032 

100000 
0114bO 



7S: 
55: 



KgIN 

CLR 

BIT 

BNE 

CMP 

BLC 

MOV 

MOV 

HLT 

CLR 

BR 

BIT 



bS: 



Ji 
BIC 
BIT 
BEQ 
MOV 
JMP 
BIT 
BEO 
MOV 
MOV 
MOV 
MOVB 
BNE 
MOVB 
INC 
MOVB 
CLRB 
CLR 
JSR 
BIT 
BNE 
CMP 
BLO 
MOV 
MOV 
HLT 
CLR 
BR 
BIC 
JMP 



PC.STARTR 
TIME 

•RFLG.STAT 
2S 

TIME, tlOO 
IS 

3RCSR.R2 
XCSR(R4) ,R3 
1 

TIME 
IS 

•NO0AT.3SWR 



. w. TESTD 

•rflg.stat 

•LOOP , 3SUR 
45 

•M J, BACK 
EOP 

•400, 35 WR 
7S 

{x8a; R§ 

R3. XOA 
CR2)*, (R3) + 

■I?7, -(R3) 
R3 

•177, (R3) + 
TIME 

PC.STARTX 

•XFLG.STAT 

bS 

TIME. tlOO 

3RCSR.R2 
XCSR(R4),R3 

TIME 
5S 

•XFLG, STAT 
SILB 



USE EXTERNAL DATA' 
BR IF NO 
SET POINTER 
SET POINTER 
SETUP XNIT DATA AOOR 
MOVE INPUT TO OUTPUT 
LOOP IF NOT ZERO CHAR 
INSERT A FILL CHAR 
BUMP ADDRESS 
INSERT ANOTHER FILL 
INSERT ZERO CHAR 
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79b 
797 
798 
799 
800 
801 
SOS 
803 
804 
805 
806 
807 
808 

809 011710 

810 Qil/ll 

811 011720 

812 011722 

813 01172b 

814 Q 1 * 7 * 

0117M2 
0117M4 

on" — 

815! 

OUT 

on; 
on; a 

011772 

825 011776 

826 gif _ 
oil 

Oli 
012 
Oli 
01< 
Oli 
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SEO 0017 
5E0 0017 



SIS 
16 
817 
818 

819 
20 
821 

iff 

824 



U016 



827 
826 
829 
830 
831 

83M Ql 

835 01 

836 012046 

837 or 

838 01 

839 01 

840 01 
01 
01 
01 
01 

845 0121 
84b 012110 
847 012112 
84B 012116 
84S 012124 

850 012126 

851 012134 



1013 
-^3727 
10376S 
011402 
0l64tT 



841 
842 
843 
844 




37 
~7 
1002 
004737 
032777 
001671 
012737 
000137 



ROUTINE USED IF "EXTERNAL LOOP BACK" HAS SELECTED. 
"wy.Ltl* .A - l DUPLEX NAY BE SELECTED IN THIS NODE. 

K~ MEANS T^T^HE TRANSMITTER IS FIRST 
DUPLEX) AND THE WHOLE MESSAGE IS TRANSMITTED: 
■ - THE m0L£ ^sspqe IS RECEIVED 



EITHER HALF OR 
-EXTERNAL LOOP 
TURNED ON ( IF I 

THEN THE RECEIVE^ IS ENABLED. AFTER THE WHOLE MESSAGE 

dim j?^W^*HH»mjaMP?r 

FINISH THEN RESTARTS THE RECEIVER AND TRANSMITTER. 
##•«*####«*«•*«*»«#«««###*»»««»»»««««*«»**«****»*«*«***«»*»****»«*♦* 



000001 011014 

uiJ402 
013062 

100000 

040000 

011032 000100 



000004 
011032 
000001 



SXLB: 



IS 
2S 
71 



011014 3S: 



100000 
013402 

000001 

100000 

011032 

000004 

011032 

100000 
040000 
011032 
000200 

012300 
000020 

011710 
013140 



011014 
000100 



41: 



176734 

176720 
01305b 



61: 
BS: 



51: 



KBOIN 

8E0 

JSR 

JSR 

CLR 

BIT 

BNE 

BIT 

BNE 

CNP 

BLO 

NOV 

NOV 

HLT 

CLR 

BR 

BIT 

BNE 

BIC 

JSR 

BR 

BIT 

Hf 

BNE 

CNP 

BLO 

NOV 

NOV 

HLT 

CLR 

BR 

BIC 

BIC 

CLR 

BIT 

BNE 

JSR 

BIT 

BEO 

MOV 

JMP 



•FULL . DUPLEX , PARAM2 
IS 

PC.STARTR 
PC . STARTX 
TINE 

•XFLG, STAT 
3S 

•RFLG.STAT 
4S 

TINE, 1100 



•RCSR.R2 
XCSR(R4),R3 
1 

TINE 



ULL. DUPLEX, PARAM2 
71 

•XFLG.STAT 
PC.STARTR 

•FULL . DUPLEX , PARAM2 
BS 

•XFLG.STAT 
61 

TIME, 8100 
41 

9RCSR.R2 
XCSR(R4),R3 

is* 

•XFLG.STAT , 

•NOOAT-aSWR 
51 

PC.TESTD 

•l6op.sswr 

1XLB 

•1XLB , BACK 
E0P 
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852 
853 
85W 
855 

H? 
HI 

860 

•1 



012140 
012140 
012144 
012152 



3b3 
96M 
865 

0 

868 

869 

870 
871 
872 
873 
87M 
875 
876 
877 
878 
87? 
880 
881 
882 
883 
884 
885 
886 
897 
888 
883 
890 
891 
892 
893 
894 
895 
896 
897 
898 
899 
900 
901 
902 
903 
90S 
90S 
906 
907 



012300 
01230M 
012306 
012314 
012316 
012322 
012326 
012330 
012334 
012340 
012344 
012346 
012350 
012354 
012356 
012362 
012364 
012370 




0137QO 
013701 

013703 
013704 

8!i^ 

053764 
000177 
000000 



013746 
001413 
032777 
001007 
If 




0057 
104400 
013701 
013702 
122122 
001776 
123741 
001447 
122742 
001 DOS 
010237 
104400 



000340 
000004 
177677 
000100 

tm 

013042 

013046 
013OS0 
013052 



013040 
013042 
013044 
013046 
013050 

WW 

012276 
000560 



F02 
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#*###»*«#»«#»««#««««*««*««»« 

ROUTINE TO RETURN 
TO MONITOR FOR 
END PASS. 
##«#«#«#•#«#«*««•««««»*«**** 



EOP: 



012276 

512276 
D0004 
000002 



STPS.PRTY7 



ENTER: 



013054 
000004 



OTPIE: 



NOV 
BIC 
BIC 
NOV 
NOV 
NOV 
NOV 
NOV 
NOV 
NOV 
RTS 



NOV 
NOV 
NOV 
NOV 
NOV 
NOV 
NOV 
BIS 
JNP 

000000 



XCSR(R4), OTPIE 
itC<TIE>.QTPIE 
- t XCSR(R4) 




(SP) 



■TI 
•EN 

RO.L 

R2;Svgi 

R3.SAVR3 
R4.SAVR4 
RS SAVRS 
PC 



SAVRO.RO 

SAVR1.R1 

SAVR2.R2 

SAVR3.R3 

SAVR4.R4 

SAVR5.R5 

■-l.Du.AY 

0TPiE,XCSR(R4) 

3BACK 



SET PS PRIORITY TO 7 
SAVE TX CSR 
CLEAR ALL 
CLEAR 




_ BUT TX IE. 
TX I| (EVEN IF 
RETURN IF SW 
GISTER 



:gister 

GlfTER 
.AGISTER 
REGISTER 
REGISTER 



0 
1 
2 
3 
4 
5 



IT WASN'T 
14=1 



SET) 



RETURN TO CONTROL PROGRAM 



RESTORE RO 
RESTORE Rl 
RESTORE R2 
RESTORE R3 
RESTORE R4 
RESTORE RS 

;IF ORGINALLY SET; SET TX IE 



011056 

020000 176530 

012500 
176502 

012561 
011C22 
011020 



011040 
000002 
012372 



♦«#«###»#»#»#*««»###•»••**«•««**« 



tESTO: 



TSTDAT: 
5CAN4: 



BIT 

?YPE 

JSR 

TST 

TYPE 

NOV 

NOV 

CNPB 

BEQ 

CNPB 

BEO 

CNPB 

BNE 

MOV 

TYPE 



WBt 



-(SP) 



ifim.aswR 



2016 



RO 

-(SP) 
.NSG1 

!S8: 

(Rl)*, 
SCAN4 
TX.TERM.-(Rl) 
TESTOX 
•002.-CR2) 
2S 

R2. IS 



Rl 
R2 

(R2)* 



MAS THERE A RECEIVE ERROR' 
BR IF NO 

INHIBIT PRINTOUTS' 

U5><12> THERE WAS A RECEIVE ERROR. 
PRINT CONTENTS OF RBUF 

<15><12> 

SETUP XMIT DATA ADOR 
SETUP RCV DATA AODR 
DATA OK ' 
BR IF OK 
IS IT END 
BR IF YES 



RBUF 



OF DATA 
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906 012372 
90S 012374 



000000 
000437 




929 012466 




111103 
114« 




013O4G 

936 013OM2 

937 013044 

938 013046 

939 013050 

940 013052 

941 013054 

942 013056 

943 013060 
944 



005015 
015 
005015 

0058l5 
015 
005015 

000000 
OOOOOO 



000000 
OOOOOO 
OOOOOO 
OOOOOO 
OOOOOO 



012564 
011020 



012611 
011022 



176414 
012446 

012464 



044124 
000012 



0461_ 
053412 
OMb 120 



If: 
21: 



SCAN5: 

RDAX: 

OERR: 
TESTDX: 




MSGS: 
.EVEN 
SAVRO 
SftVftl 



SAVR4 
SAVR5 
DELPY 
BOCK: 
STOP: 



.WORD 
BR 

TSTB 
BE 0 
CrtPB 

K 

CflPB 
BEQ 
NOP 
BIT 

type 

MOV 
TYPE 

TYPE 

MOV 

TYPE 

IXDA 

MOVB 

MOVB 

HLT+7 

TST 

RTS 



ASCIZ 

oscir 

RSC" 




□ 
0 
0 
0 
0 
0 
0 
0 
0 



0 

TE5T0X 

CR2) 
TESTDX 

•177. (Rl)* 
SCAN4 

•177. (R2>* 
SCANS 

•BIT13.9SUR 

DERR 

, MSG2 

Irda, RDAX 



. MSG3 
IXDA, 



,♦10 



20 



BR IF YFS 

IS IT FILL CHAR 7 

BR IF YES 

BACKUP 

IS IT FILL 7 

DATA F ERROR 
INHIBIT PRINTOUTS 
BR IF YES 

<15><12>RECEIVED DATA = <15^<12' 
SETUP DATA AORESS 
PRINT RECEIVED DATA 



SEO 0019 
5E0 0019 



RECEIVEP.DATA^pR, 



<15><12>DATA 



ULD BE<15><12> 



XMI7 DATA 



DATA 




DATA 
HALT 



FROM SUB/ROUT 



(R1),R3 ;SETUP 
-(R25 ,R2 

(SP)* 
PC 

< 15> < 12> /THERE WAS A RECEIVER ERROR. REGISTER (SEL 2) =/ 
<15><12> 

< 1S> < 12> /RECEIVED DATA * /<15><12> 
<15X12>/DATA SHOULD BE/<15><12> 
< 15> < 12> /PLEASE MAKE CONNECTION (DIAL NUMBER)./ 

<l|xll>/MHEN CONNECTION COMPLETE: HIT CONTINUE SWITCH. /< 1S>< 12> 
< 15> < 12> /PLEASE MAKE CONNECTION (6lAL NUMBER) . /* ISx 12> 
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SEQ 0020 
SEQ 0020 



970 
971 
972 
973 
974 
975 
975 
977 
978 
979 
980 
981 
982 
983 
984 
985 
986 
987 
988 
989 
990 
991 
992 
993 
994 
995 
996 
997 
996 
999 
1000 



u 



013062 
013062 

%m 

013074 
013102 
013110 

013124 
013132 

§13136 
13142 
13144 
013150 

8131 " 

013154 

MiiSI 

013174 
□13200 
013204 



013266 
013272 
013274 
013300 
013306 
013314 
01331b 
013322 
013324 
013330 
01333b 





001003 

«m 

052714 
032714 
001430 

032714 
001017 
023727 
103771 
011402 
016403 
032777 

man 

0OSO37 



B0R 

001775 

00S737 
00141b 
005037 
012737 
062737 
001374 
005337 

MM 

032737 
001415 



013054 



01353b 



013054 
011022 
000002 
013060 

012534 

84S&5 

010000 

000004 
000002 

020000 
011032 



000004 
010000 



011032 
01101b 
010000 

011024 

013534 
000030 
000001 

01353b 

011024 
000001 



STARTX: 



01353b 
013534 



011070 IS: 



011014 2S: 



3S: 



CTSU: 



00003b 
175504 



II 
21 
3$ 

CTSOK: 



01353b 
013534 



011014 2S: 



TST 

MOV 
ADO 
BtC 

CLR 

MOV 

BIS 

TST 

BNE 

TYPE 

HALT 

ffl 

BNE 

in 

BIS 
BIT 
BEQ 

BIT 
BNE 
CMP 
BLO 
MOV 
MOV 
BIT 

HLT>2 
CLR 

Rt 

IB 

BEQ 

TST 
BEQ 
CLR 
MOV 
ADO 
BNE 
DEC 
BNE 
CLR 
BIT 
BEQ 



•IF SW04=1 & SW14=0 URIT BEFORE TUR1NING ON TX 
•NQ GO AHEAD AND TURN ON TX 
• PREPARE FOR DELAY 

; INCREMENT DELAY 



DELAY 

tfcn 

■7, TEMP2 
•1, TEMPI 
. -b 
TEMP2 

.-14 
DELAY 

IXDA, XDA 
•DTR.3RCSR 

fTOP 
S 

,MSG4 
STOP 

•FULL. DUPLEX .PARAM2; FULL DUPLEX' 



;ZER0 POINTER. 
SETUP XMIT DATA ADDR. 
;SET REQUEST TO SENO 



31 

•10000, 3RC5R 

.-4 

•RQTS , 3RCSR 
•DTR, 3RCSR 
CTSOK 



PRINTOUT ' 



•CTS, 3RCSR 
2$ 

TIME, «3b 

Xcli?R4)^3 
•|U12.3SWR 

TIME 

PAPAM3 

•I880O, 3RCSR 
31 

jTTLE 

TEMPI 

•14#g 1 TEMP2 
•l^TEMPl 

TEMP2 

SETTLE :uu.t«ri uttn 1 

•FULL. DUPLEX, PARAM2; FULL DUPLEX' 
If ; BR IF NO 



BR IF YES 



CAR^ER £ gP' 

IS THIS A DL11-E' 
BR IF NO 

S CLEAR TO SEND SET' 
, IF YES 
30 SECS ELASPEO' 

Setup r8v CSR 

CPTUP XMIT CSR 

PRINTOUTS' 



WAITING TO XMIT' 
TIMER 

SfANDAR^MOOEM' 

Is c8rr!er UP' 

BR IF NO 

CONNECTION JUST MADE' 
BR IF NO 

YES PREPARE FOR DELAY 
INCREMENT DELAY 



; CLEAR DELAY FLAG 



♦ ♦0 

♦ ♦0 

♦ ♦D 
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1001 
1002 
1003 
1004 
1005 
1006 
1007 
1008 
1009 
1010 
1011 
1012 
1013 
1014 
1015 
1016 
1017 
101B 
1019 
1020 
1021 

1811 

102S 

1027 
102$ 
1029 
1030 
1031 
1032 
1033 
103M 
103S 
1036 
1037 
1038 
1039 
1040 



0133HO 032700 





013MOO 000207 




013S34 
013536 
013S40 
G 13542 



000000 
000000 
000000 
000000 



000004 

177777 
000100 

013SH0 

000100 



013060 
000002 

turn 

177777 
0000C1 

000004 

013S34 
013S34 

177777 
011020 
001000 
040000 
0110S4 
0110S6 
000002 
000143 
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5E0 0021 
5E0 002 



013542 
000004 



000004 IS: 



011024 
013060 
011014 



013540 
011066 
011064 



BIT ■ XL 8, MODE 

BEQ It 

MOV ■-l.TRNF^C 

BIS «TIE.XCSR(R4) 

WRIT 

TST SNCFLG 

BNE .-4 

BIS «TIE, XCSR(R4) 

RTS PC 



XLB MODE' 
BR IF NO 
SET FLAG 

SET INTERUPT ENABLE 

FIRST CHAR RECEIVED YET' 
BR IF NO 

SET XHIT INTERRUPT ENABLE 
EXIT FROM SUBROUTINE 



»###»###»«##««•»##*»«««•««»«»««*•*«**«*««**«**»»«*«**»«*****•*• 

INITIALIZE RECEIVER SUBROUTINE 
##»#####»«#####•###»«#««#«#«#•»##«#«»•«««•«•*****»****»*•**••«♦ 



STARTR: TST 
BNE 



2S: 
IS: 



3S: 



BIS 
TYPE 
MOV 
MOV 
BIT 
BEQ 
BIT 
BEQ 
CLR 
INC 
BNE 
MOV 
MOV 
MOV 
8IC 
CLR 
CLR 
TST 
BIS 
RTS 



;FIRST TIME HERE' 
BR IF NO 
SET DTR 

;HAKE CONNECTION 
YES SET DELAY FLAG 



STOP 
IS 

•0TR.9RCSR 
.MSGS 

fc-1, SETTLE 
t-l'STOP 

■FULL. DUPLEX, PARAM2; FULL DUPLEX' 
3S ; BR IF NO 

■XLB, MODE fiPJflg 

TEMPI | START DELAY 

TEMPI 

.-4 

SNCFLG 
IRDA, RDA 
■1000, RCC 
■RFLG.STAT 
ERCSR 
EROBR 
RBUF" ( RM ) 

•RIE+DTR+DIE+RE , 3RCSR; SET INTERRUPT ENABLES 
PC ; EXIT FROM SUBROUTINE 



;5ET FLAG 

SETUP RCV DATA ADDR 
SETUP RCV CHAR CC'JNT 
; CLEAR RFLG 
RESET ERROR RECORDS 



TEMPI: 0 

TEMP2: 0 

SNCFLG: 0 

TRNFLG: 0 
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1041 
1042 
1043 
1044 
10M5 
1046 
1047 
1048 
104<3 
1050 
1051 
1052 
1053 
1054 
1055 
lOSfe 
1057 
1058 
10SS 
1060 
1061 

lot! 

1064 
1065 
1056 
1067 
1068 
1069 
1070 
1071 
1072 
1073 
1074 
1075 
1076 
1077 
1078 
1079 
1080 
1081 
1082 
1083 
1084 
1085 
1086 
1087 
1088 
1089 
1090 
1091 
1092 
1093 
1094 
1095 
1096 



013544 
013545 
U 13554 
013556 




013662 
013664 
013665 
013670 
313674 
013700 
013704 
013712 
013714 
013720 
013722 
013726 
013726 
013732 
013736 
0137M2 
013744 
013750 
013752 
013756 
013760 

013764 
013770 
013772 
013775 
014002 
014005 



000240 
127737 
001010 
052700 
042714 




005237 
005737 
001403 
042764 
005037 
005037 
000002 



000240 
10S714 
100055 
115401 
142701 
110177 
032777 
001405 
IDS 777 
100002 
110177 

005237 
105077 
005337 
001010 
042714 
011402 
016403 
104006 
004737 

123701 
001004 
042714 
052700 
005754 
100005 



100000 
000004 
000100 



17S266 
000100 

175256 



011070 
013542 

000100 
011032 
013542 



000002 
000200 
175162 
000040 

17S155 

175152 

011065 
175130 
011064 

000100 

000004 

013402 

011041 

000140 
040000 
000002 



SEQ 0022 
SEO 0022 



175315 011040 



000004 



0OOCO6 
175232 



###««««##«####»##««*»#«««*««««••««***«««««****«*«*********« 

TRANSMIT INTERRUPT SERVICE ROUTNE 
##«##»#«##»#**#»»#»##»*«##»*»««««»»»•*»«•»«*•««*»*««•»*»•»**«*♦ 

fclSR: NOP. TX.TERM ;FINISHED XMITTINC' 

XISRl BR IF NO 

•XFLG. STAT SET XMIT COMPLETE FLAG 
tRQTS 3RCSR RESET REQUEST TO SEND 

XCSR(R4) RESET XMIT INTERRUPT ENABLE 



175242 17S250 



000004 



XISRl: 



NOXNON: 
XISR2: 



IS: 



CMPB 
BNE 

BIS 
BIC 
"IC 
R 



MOVB 

BIT 

BEO 

TSTB 

BPL 

MOVB 

INC 
TST 
BEG 
BIC 
CLP 
CLR 
RTI 



■ TIE. 
XISR2 

axoA, 

■ 100. 

noxm6n 

3TPS 

NOXMON 

SXOA, 



XBUF(R4) 
3SWR 



STPB 



XDA 

TRNFLG 

IS 

•TIE,XCSR(R4) 

TIME 

TRNFLG 



XMIT NEXT CHAR. 

MONITOR OUTPUT' 

BR IF NO 

IS TTY AVAILABLE 

BR IF NO 

TYPE THE CHAR 

INCRMENT ADDRESS 
FIRST CHAR' 
BR IF NO 

CLEAR INTERUPT ENABLE 
RESET TIMER 
CLEAR FLAG 

RETURN FROM INTERRUPT 



#####«###•##«••#*»••#«»**•»•*«**«»*«*«•««**»***«****»«*»*•*•*** 

RECEIVE INTERRUPT SERVICE ROUTINE 



175132 



: w w -m -m m w 

RISR: 


NOP 




TSTB 




BPL 




MOVB 




BICB 




MOVB 




BIT 




BEO 




TSTB 




BPL 




MOVB 


NORMON: 






INC 




CLRB 




DEC 




BNE 




BIC 




MOV 




MOV 




HLT+5 




JSR 


IS: 


CMPB 




BNE 




BIC 




BIS 


RISR1: 


TST 




BPL 



9RCSR 
RISR2 

Rl. 3R0A 

446. 3SWR 

NORMON 

3TPS 

NORMON 

Rl, 3TPB 

ROA 

3RDA 

RCC 

•SlE- 3RCSR 
3RCSR. R2 
XCSR(R4),R3 

PC, STARTR 

RX.TERM.Rl 
RISR1 

•RIE+DIE.3RCSR 
•RFLG. STAT 
RBUFCR4) 
RISR2 



IS RECEIVER DONE BIT SET 

BR IF NO 

STORE CHAR. 

STRIP A BIT 

MOVE CHAR TO INBUF 

MONITOR INPUT' 

?S TTY AVAILABLE' 



BR IF NO 
TYPE THE 



CHAR 



BUMP POINTER 
CLEAR NEXT CHAR POSITION 
CREMENT CHAR. COUNTER 

IF BUFFER NOT FULL 
SET INTERRUPT ENAB 
TUP RCV CSR 
TUP XMIT CSR 
CEIVER BUFFER FULL 
INITIALIZE RECEIVER 

;IS IT LINE FEED' 
BR IF NO 

DISABLE INTERRUPTS 
SET RCVR COMPLETE FLAG 
IS THERE A DATA ERROR 
; BR IF NO 
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1097 014010 011437 011054 



1098 
1099 
1100 
1101 
1102 
1103 
1104 
1105 
110b 
1107 



014014 
014022 



14C 
014C_ 
014036 
014042 
01404b 



100004 

005037 
005037 
000002 

000001 



K02 
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000002 01105b 



OUObO 
020000 
013540 
011032 



RISR2: 



RISR3: 



MO" 
MOV 
TST 
BPL 
MOV 
BIS 
CLR 
CLR 
RTI 

.END 



3RCSR. ERCSR 
RBUF ( R4 ) , EROBR 
3RCSR 
RISR3 

3RCSR. DSSTAT 
■DSFLG, STAT 
SNCFLG 
TIME 



SAVE RCSR 
SAVE R08R 

IS THERE A DATA SET STATUS CHANGE 

BR IF NO 

SAVE STATUS 

SET FLAG 

CLEAR FLAG 

RESET TIMER 

RETURN FROM IN i ERRUPT 



-ZDLOQO Dull 



ITEP OVER 



ERLftY 
-78 15.25 



B«CK 

BITO 

BIT 1 

8IT10 

8IT11 

BIT12 

BIT13 

BIT14 

BIT1S 

BITS 

BIT3 

BIT4 

BIT5 

B!Tb 

BIT/ 

BITB 

BIT? 

aaoib 

CT5 

CTSOK 

CTSW 



HP 

OIE ■ 
DISPLfl 
DL11 



DSSfflT 
DTR « 
ENTER 
EOP 

ER • 

I^IS 

FE » 
FLAG 
FULL.D* 
GO 

I LB « 

IROft 

IXDA 

MSGO 

PtSGl 

MSG2 

HSG3 

MSG4 

MSG5 

NOOAT > 

NORMON 

NOXMON 

OR = 



01 100M 
0130Sb 
000001 





_>4 
J12M66 
000040 
011046 

on ooo 



JHObO 
000002 
012226 




li 

12561 
012564 
012611 
012634 
012766 
000200 
013726 
013630 
OMOOOO 



L02 

1 1 ^O^EFE^NcT-TAlLE^^ilHi^S 



SEO 



m 



02H 



e>Hb 

735* 



6161 



895 
974 

m 



J79* 
929 ■ 
1034 



615t 
1101* 
960 
872 • 
736 



810 

*K 

775 

m 
mi 

93Si 
93SI 
963 

1017 
701 
1078 
1056 



770« 



S92 



764 
10801 
10581 



850* 



919 



881 



9421 



9901 

984 

9411 


950 


958* 


1093 






1102 






971 


1016 


1034 


771 


851 


858* 




1098* 




826 


831 


966 


899 
898 

m 


922 
926 

8 


1028 
928 

§48 



999 
959 



1020 



845 



88i 



parah2 



lIOR 
PRTYO « 
PRTY1 j 
PRTY2 » 
PRTY3 : 
PRTY4 » 
PRTYS » 
PRTYfe « 
PRTY7 i 
QTPIE 
RU i 
RBUF = 
RCC 

RO i 
ROfl 
RDRX 
RE 

RFLG s 
RI * 
RIE * 
RISR 
RISR1 
RISR2 
RISR3 
RIV 

ROTS t 

RWAIT s 

RX.TER 

SAVRO 

SflVRJ 

SAVR2 

SAVR3 

SAVR4 

SAVRS 

SCANS 

SCONS 



SRO 
START 
STARTR 
STARTX 
STD 
STOP 
STPS a 

CUD 




012c 

883881 

011064 
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m: 

5901 
5911 
£921 

"1! 

)ii 
Jii 
sen 

5811 

sen 

5811 
581 • 

seii 

860* 
58lt 

sen 

6251 

seia 

626a 
922* 
5811 
blMi 
581 i 
581t 
642 
1092 
1071 
1100 
588« 
5811 
581* 
603* 
864* 
865* 
866* 
887* 
BE>8* 
869* 
900 a 
918i 

xW 

619a 
581 a 
600 
690 
721 
581 a 
660* 
5811 

iB 1 

581 • 
618M 



) 11066 
012446 
00000 1 

omcSoo 
L40000 

000100 
013662 
014002 
014022 
014C36 
011006 
000004 
104410 
011041 
013040 
013042 
013044 
013046 
013050 
0130S2 
012344 
012420 

M& 

011052 
002000 
011102 
013*402 
013062 
000010 
013060 
104414 
011044 
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CROSS REFERENCE TABLE — USER SYMBOLS 



SEQ 0025 
SEO 0025 



664 
661 
647 
648 
985 


810 


826 


831 966 


999 


1020 


643 


645 










859 
861* 


880 


882 a 








1033 
1029* 


1072 
1083* 


1095 


1098 






1028* 
924 • 

1034 
691 


1074* 
704 


1081* 
755 


1082* 
767 817 


843 


1030 


1034 
10691 
109Stt 
1096 
1103a 
641 
970 


108S 

1099a 

1048 


1093 








1091 
873 

or *f 

875 
876 
877 
878 
901 


935 a 

937a 
938a 
939a 
940a 
914 


917 








■319. 




154S: 









SU12 s 010000 
SXCSR 011050 



638a 

753 
784 

943a 
859 

107S 
980 



1094 



812 
813 


329 
949 a 


1014a 


1089 














961 


965* 


1014 


1019* 














701 


705 


733 


764 


768 


772 


845 


848 


892 


919 



980 
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ITEP OVERLAY 
23-MAR-78 IS: 25 



TEMPI 
TEMP2 

tIItox 

TIE * 
TIME 

TK8 
TKS 
TPB 
TPS 

TP. x 

TRNFLG 

TSTDAT 

TX.TER 

TYPE * 

XBUF « 

XCC 

XCSR ■ 




SOU] 

souo 

SXLB 



013S34 
013S36 

OOOlOO 
011032 



011074 
011072 
011100 




oi: 

Oli 
01104Q 
104400 
000006 

SioSoM 




104412 
11460 
11254 
011362 
011710 
014050 



8 
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CRO 

954* 
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) 23-MAR-78 lb 
FEkENCE table - 



59 
661 
bS8* 
319 



1057* 
10S5 

10401 
893 
902 
894 

10S2* 



992* 


994* 


1024* 


993* 


996* 


10381 


l!I 


Hi! 




862 


1004 


1008 


693 


698* 


722* 


824 * 


835 


840* 



1079* 
1077 

1060 
898 1 

1045 
897 



696 
1062* 
959* 

732 



1001 

7ol 
737 
849 
778 



1064* 
907 



728 
1087 
1045 

785 



1022 



850 
926* 



921 



780 

1052 
794 



955 



ABS. 014050 



000 



ERRORS DETECTED: 0 

DSKZ : CZDLOO , DSK2 : CZDLOD . SE0=05KZ : I TEP 1 . MAC , DSK2 : CZOLOO . P 1 1 
RUN-TIME: 3 5.3 SECONDS 
RUN-TIME RATIO: 65/9=7.1 
CORE USED: 16K (31 PACES) 
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B03 




